home *** CD-ROM | disk | FTP | other *** search
- object TQuickReportDemo: TTQuickReportDemo
- Left = 386
- Top = 250
- Width = 349
- Height = 406
- BorderIcons = []
- Caption = 'QuickReport version 0.96 Demo'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- PixelsPerInch = 96
- Position = poScreenCenter
- OnCreate = FormCreate
- TextHeight = 16
- object Bevel1: TBevel
- Left = 4
- Top = 4
- Width = 333
- Height = 97
- end
- object Shape1: TShape
- Left = 8
- Top = 8
- Width = 325
- Height = 89
- Pen.Width = 0
- end
- object Image1: TImage
- Left = 16
- Top = 12
- Width = 105
- Height = 57
- Picture.Data = {<image000.bmp>}
- Stretch = True
- end
- object Label2: TLabel
- Left = 132
- Top = 16
- Width = 193
- Height = 36
- Caption = 'QuickReport'
- Font.Color = 10485760
- Font.Height = -32
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- Transparent = True
- end
- object Label1: TLabel
- Left = 116
- Top = 48
- Width = 209
- Height = 33
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Copyright (c) 1995 Allan Lochert allan@u9.oslohd.no'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- Transparent = True
- end
- object Label3: TLabel
- Left = 60
- Top = 280
- Width = 269
- Height = 21
- Caption = 'Set to two or more to print thumbnails'
- end
- object Label4: TLabel
- Left = 40
- Top = 76
- Width = 285
- Height = 21
- Alignment = taRightJustify
- AutoSize = False
- Caption = 'Compuserve 101372,3471 SWREG# 8644'
- Font.Color = clNavy
- Font.Height = -11
- Font.Name = 'Arial'
- Font.Style = [fsBold, fsItalic]
- ParentFont = False
- Transparent = True
- WordWrap = True
- end
- object ReportCombo: TRadioGroup
- Left = 8
- Top = 108
- Width = 329
- Height = 57
- Caption = 'Select report '
- Columns = 2
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- Items.Strings = (
- 'Simple report'
- 'Memos and pictures'
- 'Master-Detail report'
- 'Mailing labels')
- ParentFont = False
- TabOrder = 0
- end
- object PreviewBtn: TButton
- Left = 8
- Top = 348
- Width = 149
- Height = 25
- Caption = 'Preview'
- TabOrder = 5
- OnClick = PreviewBtnClick
- end
- object PrintBtn: TButton
- Left = 8
- Top = 316
- Width = 149
- Height = 25
- Caption = 'Print'
- TabOrder = 4
- OnClick = PrintBtnClick
- end
- object PrintDialogChk: TCheckBox
- Left = 12
- Top = 248
- Width = 161
- Height = 17
- Caption = 'Show print dialog'
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- ParentFont = False
- TabOrder = 2
- end
- object ExitBtn: TButton
- Left = 184
- Top = 348
- Width = 149
- Height = 25
- Caption = 'Exit'
- TabOrder = 6
- OnClick = ExitBtnClick
- end
- object OrientationCombo: TRadioGroup
- Left = 8
- Top = 172
- Width = 157
- Height = 65
- Caption = 'Orientation '
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- Items.Strings = (
- 'Portrait'
- 'Landscape')
- ParentFont = False
- TabOrder = 1
- end
- object SpinEdit1: TSpinEdit
- Left = 12
- Top = 276
- Width = 37
- Height = 26
- Font.Color = clBlack
- Font.Height = -13
- Font.Name = 'System'
- Font.Style = []
- MaxValue = 9
- MinValue = 1
- ParentFont = False
- TabOrder = 3
- Value = 1
- OnChange = SpinEdit1Change
- end
- object PreviewCombo: TRadioGroup
- Left = 180
- Top = 172
- Width = 157
- Height = 65
- Caption = 'Preview type '
- Items.Strings = (
- 'Standard'
- 'Simple custom')
- TabOrder = 7
- OnClick = PreviewComboClick
- end
- end
-